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IDENTIFICATION 

PRODUCT CODE: f1flINDEC-ll-DZKGfi-B-D 

PRODUCT NflNE: KGllfl - CYCLIC REDUNDflNDCY CHECK TEST 

DATE RELEASED: MARCH. 1977 

NAINTfllNER: DIAGNOSTIC ''^ROUP 

NOTE: REV, A OF THIS PROGRAM OBSOLETED MD-11-D8K 



COPYRIGHT 1971.1977 BY DIGITAL EQUIPMENT CORPORATION 
THE INFORMATION IN THI§ DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES 
NO RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS 
DOCUMENT. 

THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED UNDER A 
LICENSE AND MAY ONLY BE USED OR COPIED IN flCCORDRNCE WITH 
THE TERMS OF SUCH LICENSE. 

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY 
FOR THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT 
THAT IS NOT SUPPLIED BY DIGITAL. 
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ABSTRACT. 



THIS PROGRAH TESTS THE LOGIC OF THE CYCLIC REDUNDANCY CHECK 
DEVICE (KGIIA). 



REQUIRENENTS. 



A STANDARD PDP-11 (UITH OR WITHOUT A HARDUARE SWITCH REGISTER) 

AND A KGU 



LOADING— STORAGE. 



LOADING PROCEDURE FOR NORMAL BINARY TAPES SHOULD BE FOLLOWED. 



DEVICE ADDRESS CHANGE. 



TO CHANGE THE DEVICE ADDRESS (WHICH WAS LOADED AS 170700), 
CHANGE THE CONTENTS OF THE LOCATION "DEVADR" SHOWN ON 
PAGE 24/ SET THIS LOCATION TO THE ADDRESS OF THE CSR 
DESIRED, THEN START (OR RESTART) AS GIVEN IN OPERATION BELOW. 



OPERATION. 



THIS PROGRAM NAY BE OPERATED IN TWO MODES. 

A. FULL TEST MODE. 

THIS IS THE MAIN BODY OF THE PROGRAM AND SHOULD 
BE USED TO ACCEPT OR DIAGNOSE A DEVICE. 
TO RUN: START AT LOC. 200 WITH SWR15 SET. 
(DETAIL ON PAGE 5.) 

B. SELECT TEST MODE 

THIS IS A SUBPROGRAM TO ALLOW THE OPERATOR TO RUN 
A SELECT INSTRUCTION ON A SELECT DATA WORD. 
TO RUN: START AT LOC. 204 WITH SWR15 SET. 

SELECT INSTRUCTION ON SWR5-D. 

SELECT DATA WORD ON SWRli-b. 
(DETAIL ON PAGE b.) 
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SWITCH REGISTER. 



IF THE DIflGNCSTIC IS RUN ON A CPU WITHOUT A SWITCH 
REGISTER THEN A SOFTWARE SWITCH REGISTER IS USED WHICH ALLOWS 
THE USER THE 5Af€ SWITCH OPTIONS AS THE HARDWARE SWITCH REGISTER. 
IF THE HARDWARE SWITCH REGISTER DOES NOT EXIST OR IF ONE DOES 
AND IT CONTAINS ALL ONES 1177777) THEN THE SOFTWARE SWITC 
REGISTER (LOC. I7b) IS USED. 



'CH 



CONTROL: 



1. 
2. 
3. 
4. 
5. 
h. 



OFTWARE SWITCH 



THIS PROGRAM ALSO SUPPORTS THE DYNAMIC LORDING OF THE ^ 
REGISTER (LOC. 17b: FRON THE TTY. THIS CAN BE ACCOMPLISHED BY 
DOING THE FOLLOWING: 

1) TYPE CONTROL G <tG>: THIS HILL ALLOW THE TTY TO ENTER DATA INTO 
LOC. 176 AT SELECTED POINTS WITHIN THE PROGRAM. 

2) THE MACHINE WILL THEN TYPE: SWR=XXXXXXNEW= (XXXXXX IS THE OCTAL CONTENTS 
OF THE SOFTWARE SWITCH REGISTER. ) 

3) AFTER THE "NEW=" HAS BEEN TYPED THEN THE OPERATOR CAN DO ONE 
OF THE FOLLOWING AT THE TTY: 

A) TYPE A NUMBER TO BE LOADED INTO LOC. 178 FOLLOWED BY A <CR>. 
(ONLY NUMBERS BETWEEN 0-7 WILL BE ACCEPTED AND ONLY b NUMBERS 
WILL BE ALLOWED) 

IF A <CR> IS TfC FIRST KEY DEPRESSED THE SOFTWARE SWITCH 
REGISTER CONTENTS WILL NOT BE CHANGED. 



SWR15 
SWR14 
SWR13 
SWRIS 
SWRll 



B) IF A CONTROL U <tU> IS DEPRESSED THEN THE PROGRAM WILL SEND YOU 
BACK TO STEP 2. 

SET. HALT ON ERROR. 
RESET, BYPASS ERROR. 



SET. SCOPE LOOP ON ERROR. 
RESET, BYPASS ERROR. 

SET. INHIBIT PRINTOUTS DURING SCOPE LOOP. 
RESfeT, AaOW PRINTOUTS DURING SCOPE LOOP. 

SET. INHIBIT TRACE TRAPPING. 
RESET, ALLOW TRACE TRAPPING. 

SET. INHIBIT ITERATIONS. 
RESET, ALLOW ITERATIONS. 



SWRll - SWR& AND SWR5 - SWRQ ARE DEFINED IN THE 
SELECT TEST MODE SECTION ON PG. b i 7, 
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FUU JEST HOPE. 

1. STfiRT OR RESTART. 

A. ZERO THE SUR 

B. LOAD 200 AND START 

2. PROGRAM ACTION. 

fl. WHENEVER THE PROGRAM IS STARTED, OR RESTARTED, THE 
TTY WILL TYPE: KGllA. 

B. IF THE SOFTWARE SWITCH REGISTER IS SELECTED 
THEN THE FOLLOWING WILL BE TYPED: 
SWRsXXXXXX NEW=( REFER TO SWITCH REGISTER 
SECTION FOR OPERATOR ACTIONS) 

C. IF THERE ARE t'O ERRORS DETECTED. THE PROGRAM WILL LOOP 
INDEFINITELY AND WILL RING THE TTY BELL ONCE FOR EACH 
PASS. TRACE TRAP IS EFFECTIVE AND EACH SUBTEST IS BEING 
ITERATED 100 TIMES. 

D. IF AN ERROR OCCURS, A ONE LINE ERROR MESSAGE WILL BE 
TYPED ON THE HY AND THE PROGRAM WILL HALT. (SEE THE 
ERROR SECTION ON PAGE 8. ) 

3. OPERATER CONTROL VIA THE SWR. 

(REFER TO SECTION ON SWITCH REGISTER SETTINGS 
FOR SOFTWARE SWITCH REGISTER. ) 

A. SWR15 SET. (NORMAL) 

HALT ON ERROR AFTER ERROR MESSAGE IS TYPED. 

SWRIS RESET. 

TYPE THE ERROR MESSAGE AND CONTINUE TO THE NEXT ITERATION 
OF THE CURRENT TEST OR TO THE NEXT SUBTEST. 

B. SWR12 SET. 
INHIBIT TRACE TRAP. 

SWR12 RESET (NORMAL) 
ALLOW TRACE TRAP. 

C. SWRll SET. 
INHIBIT ITERATIONS 



SWRll RESET (NORMAL) 
ALLOW ITERATIONS 
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SELECT TEST MODE. 



1. START OR RESTART. 

A. RESET SUR15 THRU SURO. 

B. LOAD ADDRESS 204 

C. SELECT THE INSTRUCTION TO BE TESTED FROM THE LIST OF 
INSTRUCTIONS ON PAGE NN OF THE PROGRAM LISTING. 

SET 5UR5 THRU SURO TO THE "I" NUMBER GIVEN WITH SAID 
INSTRUCTION. 

D. SELECT THE DATA WORD TO BE TESTED FROM THE LIST OF DATA 
WORDS GIVEN ON PAGES NN AND NN OF THE PROGRAM LISTING. 
SET SWRll THRU SWRfe TO THE "0" NUMBER GIVEN WITH THE SAID 
DATA UORO. 

E. START. 

F. ♦♦♦#REFER TO SECTION ON SWITCH SETTINGS FOR 
SOFTWARE SWITCH REGISTER ACTION. 

SPECIAL NOTES ON C. AND D. ABOVE. 

1. THE SELECTED INSTRUCTION AND/OR THE SELECTED 
DATA MAY BE CHANGED WHILE THE PROGRAM IS RUNNING. 

2. IF SWRll THRU SWRb ARE ALL RESET. THEN THE SELECTED 
INSTRUCTION WILL RUN ON ALL DATA WORDS. 

3. IF SUR5 THRU SURO ARE ALL RESET THEN ALL INSTRUCTIONS 
WILL BE RUN ON THE SELECTED DATA WORD. 

4. IF SWRll THRU SWR6 AND SWR5 THRU SWRO ARE ALL RESET, 
THEN ALL INSTRUCTIONS WILL BE RUN ON ALL DATA WORDS. 
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2. ORCGRfifl ACTION 

A. IF THERE ARE NO ERRORS THE PROGRAM UILL LOOP THE SELECTED 
INSTRUCTION (SWRS-0) USING THE SELECTED DATA (SWRil-b). 
TRACE TRAP IS EFFECTIVE. 

e. IF AN ERROR OCCURS. A ONE LINE ERROR MESSAGE UILL BE 

TYPED ON THE TTY A^ THE PROGRAM WILL HALT. (SEE THE 
ERROR SECTION ON PAGE 8. ) 

(REFER TO SWITCH SETTING SECTION FOR USE OF SOFTWARE 
SWITCH REGISTER) 

2. OPERATER CONTROL VIA THE SWR. 

(REFER TO SECTION ON SWITCH SETTING'S FOR SOFTWARE SWITCH 
REGISTER DYNA1IC CHANGING. ) 

A SWR15 SET. (NORMAL) 

HALT ON ERROR AFTER ERROR MESSAGE IS TYPED. 

SWRIS RESET. 

TYPE THE ERROR MESSAGE AND CONTINUE TESTING THE SELECTED 
INSTRUCTION (SWR5-0) USING THE SELECTED DATA (SWRll-S) 

B. 5WR12 SET. 
INHIBIT TRACE TRAP. 

5WR12 RESET. (NORMAL) 
ALLOW TRACE TRAP. 

C. SWRll THRU 5WR&. 
SELECTED DATA WORD. 

D. SWR5 THRU SRO. 
SELECTED INSTRUCTION. 
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ERRORS 



ERROR MESSAGE 

»»»ROUTIh€ CHECKS FOR THE DYNAMIC CHANGING OF THE SOFTWARE SWITCH 
REGISTER REFER TO SWITCH SETTING SECTION FOR OPERATOR ACTION. 
TESTX IXX DXX SXXXXXX HXXXXXX 

TESTX (X = A OR 6) 

THIS IS THE NAME (TAG) OF THE TEST THAT WAS IN USE 

AT THE TIME OF THE ERROR. 

TESTA IS ON PAGE 27 OF THE PROG. LIST. 

TESTB IS ON PAGE 28 OF THE PROG. LIST. 

IXX (XX = A NUMBER FROM 01 THRU 57) 

THIS IS THE NAME/NUMBER (TAG) OF THE INSTRUCTION IN 

USE AT THE TIME OF THE ERROR. 

Rl (INST. POINTER) POINTS AT THIS INSTRUCTION. 

THE INSTRUCTION TABLE IS ON PAGE IB OF THE PROG. LIST. 

DXX (XX = A NUMBER FROM 01 THRU 77) 

THIS IS THE NAME/NUMBER (TAG) OF THE DATA WORD IN 
USE AT THE TIME OF THE ERROR. 
RS (DATA WORD POINTER) POINTS AT THIS DATA WORD. 
THE DATA WORD TABLE IS ON PG. 20 OF THE PROG. LIST. 

SXXXXXX (XXXXXX = ANY & DIGIT, lb BIT. OCTAL NUMBER) 
THIS IS THE SIMULATED tGOOD) BCC WORD. 

HXXXXXX (XXXXXX = ANY b DIGIT.lb BIT. OCTAL NUMBER) 
THIS IS THE HARDWARE (BAD) BCC WORD. 

DONE BIT: S\S (EACH X CAN =0 OR 1) 

THIS IS THE STATUS OF THE DONE BIT (BIT 7 OF THE CSR). 
THE FIRST NUMBER (X\) IS WHAT THE DONE BIT 
SHOULD BE (GOOD). THE SECOND NUMBER (\X) IS 
WHAT THE DONE BIT ACTUALLY WAS. 

OPTIONS AFTER A HALT ON ERROR. 

**««IF THE SOFTWARE SWITCH REGISTER IS USED THEN THE OPERATOR 

CAN CHANGE THE SWREG LOCATION BY TYPING A tG AND THEN CONTINUING. »»» 

A. SCOPE LOOP. SEE SCOPE LOOP SECTION. 

B. BYPASS THIS ERROR AND CONTINUE TO THE NEXT ITERATION 
OR SUBTEST. 

1. RESET SWR14 AND SWR15. 

2. CONTINUE. 

C. UTILIZE SELECT TEST MODE (PAGE &) 
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SCOPE LOOP 

»**ROUTIf€ CHECKS FOR tG FUNCTION.*** 

1. SET UP. 

ft. SET SWR14. 

B. RESET SUR15. 

C. CONTINUE. 

2. PROGRflfl ACTION. 

THE PROGRflfl WILL SCOPE LOOP ON THE FAILING TEST FOR AS LONG 
AS SURIM IS SET, AND SUR15 IS RESET. 

3. OPERATOR CONTROL VIA THE SWR. 

A. 5UR13 SET. 

INHIBIT ERROR TYPEOUTS. 

SUR13 RESET. 

ALLOW ERROR TYPEOUTS. 

e. SWR12 SET. 

INHIBIT TRACE TRAPS. 

SWR12 RESET. 
ALLOW TRACE TRAPS. 
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FORCED ERROR TYPEOUT. 



IN THE EVENT OF AN UNEXPECTED OR ILLEGAL TRAP, OR AT ANY TIME 
THE OPERATOR DEEMS IT USEFUL. THE PROGRAM CAN BE HALTED (IF 
IT HASN'T ALREADY) AND A TYPfeoUT CAN BE OBTAINED AS TO THE 
STATUS OF THE PROGRAM. 

THIS TYPEOUT IS THE SAME ONE USED IN THE EVENT OF AN ACTUAL 
ERROR. (SEE ERROR MESSAGE ON PG. B.) 

1 HALT THE PROGRAM 

2! START AT LOC. 210. (SMR SETTINGS ARE IMMATERIAL. ) 

THE TYPEOUT WILL BE MADE AND THE PROGRAM WILL HALT. THE 
PROGRAM CAN NOW BE RESTARTED. (SEE OPERATION, PG. 3.) 
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HIS 
H1& 
417 
M18 
419 
420 
421 
422 
423 
424 
425 
426 

427 C00030 

428 

429 

430 

431 

4*32 

433 000030 

434 

435 

436 
4-57 

438 000030 

439 

440 

441 

442 

«43 000030 

444 

445 

446 

447 

448 D00030 

449 

450 

451 

452 

453 000010 

454 

455 

456 

457 
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iKGUfl CYCLIC REDUNDANCY CHECK DEVICE TEST. 

; COPYRIGHT 1976,1977 DIGITi:*. EQUIPMENT CORP., MflYNARD, nflSS. 0175^. 

; PROGRAM OBSOLETES MD-11-D3K ^ 

RELEASED 21 MAY 76 BY SAM CARPENTER 

;SUPPORTS THE SOFTUARE SWITCH REGISTER L0C.176 
ALSO SUPPORTS THE DYNAMIC LOADING OF LOC. 176 
: REVISED TO MEET ALL ACTU SPECS; REV. B RELEASED FEB. 1977 

;TRAP CATCHER (LOC. 0 TO LOC. 7?b) *********** 

30 



.REPT 
.+2 
HALT 
• ENDR 



.REPT 
.+2 
HALT 
.ENDR 

.REPT 
.+2 
HALT 
.ENDR 



30 



30 



.REPT 30 
.+2 
HALT 
.ENDR 

.REPT 30 
.+2 
HALT 
.ENOR 

.REPT 
.+2 
HALT 
.ENDR 



10 



; TRAPPED TO PREVIOUS ADDRESS. 



; TRAPPED TO PREVIOUS ADDRESS. 



; TRAPPED TO PREVIOUS ADDRESS. 



; TRAPPED TO PREVIOUS ADDRESS. 



; TRAPPED TO PREVIOUS ADDRESS. 



; TRAPPED TO PREVIOUS ADDRESS. 
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H59 
H5S 

H&O OOOOIM 
Hbl OQOOlb 
Hbc 

H(s3 000030 
H6M 000032 

4bfe 000034 
467 00OC36 
HE>8 

Hfc9 0000% 

470 

471 000052 

472 

473 

47H 

475 

47b 000176 

477 

478 

479 

460 

481 000200 
482 

483 000204 
484 

485 000210 
48Ei 



000014 
00H042 
000340 
000030 
003154 
000340 
000034 
004030 
000340 
000C46 
002406 
000052 
000000 



000176 
000000 
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.=14 

TRTRTN 

340 

.=30 

ERR 

340 

.=34 

SCORCO 

340 

.=46 

SENOAD 

.=52 

000000 

;; SOFTWARE SWITCH REGISTER********* 
.=176 

SUREG: 0 ; SOFTWARE SWITCH REGISTER 

;; PROGRAM STARTS*********** 



000200 

000167 001456 
000204 

000167 001606 
000210 

000167 003122 



.=200 
NORMAL: JNP 

.=204 
SELECT: JflP 

.=210 
FORERR: JflP 



IDENT 

INTA 

FORCER 
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437 

M89 001000 

M90 001002 

MSI OQIQQH 

492 001006 

493 001010 
4<34 001012 

495 001014 

496 001016 

497 001020 

498 001022 

499 00102^ 
SOD 001026 

501 001030 

502 001032 

503 001034 

504 001036 

505 001040 

506 001042 

507 001044 

508 001046 

509 001050 

510 001052 

511 001054 

512 001056 

513 001060 

514 001062 

515 001064 

516 001066 

517 001070 

518 001072 

519 001074 

520 001076 

521 001100 

522 001102 

523 001104 

524 001106 

525 001110 

526 001 Uc 

527 001114 

528 001116 

529 001120 

530 001122 

531 001124 

532 001126 

533 001130 

534 001132 

535 001134 
53b 001136 

537 001140 

538 001142 

539 001144 

540 001146 



001000 
000402 
004104 
001002 
004104 
001402 
004104 
5Q20Q2 
004104 
002402 
004104 
003002 
004104 
003402 
004104 
004002 
004104 
000403 
004060 
001003 
004060 
001403 
004060 
002003 
004060 
002403 
004060 
003003 
004060 
003403 
004060 
004003 
004060 
000401 
004214 
001001 
004214 
001401 
004214 
002001 
004214 
002401 
004214 
003001 
004214 
003401 
004214 
004001 
004214 
000405 
004352 
001005 
004352 



: INSTRUCTION TABLE 

.=1000 
101: 000402 

SMLRCF 
102: 001002 

SMLRCF 
103: 001402 

SMLRCF 

m 

105: 002402 

SMLRCF 
106: 003002 

SMLRCF 
107: 003402 

SMLRCF 
HO: 004002 

SMLRCF 
111: 000403 

SMLRCC 
112: 001003 

SMLRCC 
113: 001403 

SMLRCC 
114: 002003 

SMLRCC 
115: 002403 

SMLRCC 
116: 003003 

SMLRCC 
117: 003403 

SMLRCC 
ISO: 004003 

SMLRCC 
121: 000401 

SMC16C 
122: 001001 

SMCl&C 
123: 001401 

SMC16C 
124: 002001 

snci6c 

125: 002401 

SMClbC 
126: 003001 

5MC16C 
127: 003401 

SMCl&C 
130: 004001 

SMClbC 
131 : 000405 

SMCITC 
132: 001005 

SMCITC 
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LRCB 1 STEP. 
LRC8 2 STEPS. 
LRCB 3 STEPS. 
LRCB 4 STEPS. 
LRCB 5 STEPS. 
LRCB 6 STEPS. 
LRCB 7 STEPS. 
LRCB 10 STEPS. 
LRC16 1 STEP. 
LRC16 2 STEPS. 
LRClb 3 STEPS. 
LRC16 4 STEPS. 
LRC16 5 STEPS. 
LRC16 6 STEPS. 
LRC16 7 STEPS. 
LRC16 10 STEPS. 
CRC16 1 STEP. 
CRC16 2 STEPS. 
CRC16 3 STEPS. 
CRC16 4 STEPS. 
CRC16 5 STEPS. 
CRC16 6 STEPS. 
CRC16 7 STEPS. 
CRC16 10 STEPS. 
CCITT 1 STEP. 
CCITT 2 STEPS. 
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nnMM7^ 

UU 1 1 f 1 




SMC 120 

ui IV A wn 




no 1 ?74 
uuic f 1 


nnn i n? 

UUUiUC 




000102 

UUU AUfe 






nnMn7f5 

UU iwr Q 




SMLRCt 






nnni n? 

UUUi uc 




000102 

UUU * Ufe 


587 


001302 


004078 




SMLRCE 


588 


001304 


000102 


182: 


000102 


58«3 


00130b 


004078 




SMLRCE 


SSO 


001310 


000102 


163: 


000102 


581 


001312 


004078 




SMLRCE 


592 


001314 


000102 


184: 


000102 


=93 


001318 


004076 




SMLRCE 


£94 


001320 


000102 


185: 


OOOIQS 


595 


G01322 


004078 




SMLRCE 
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CCITT 3 STEPS. 
CCITT 4 STEPS. 
CCITT 5 STEPS. 
CCITT 8 STEPS. 
CCITT 7 STEPS. 
CCITT 10 STEPS. 
CRC12 1 STEP. 
CRC12 2 STEPS. 
CRC12 3 STEPS. 
CRC12 4 STEPS. 
CRC12 5 STEPS. 
CRC12 8 STEPS. 
LRC8 Of€ BYTE DflTfl. 
LRC8 TWO BYTE DATS. 
LRC18 ONE BYTE DflTfl. 
LRC18 TWO BYTE OflTfl. 
CRC16 ONE BYTE DflTfl. 
CRC16 TWO BYTE DATA. 
CCITT ONE BYTE DATA. 
CCITT TWO BYTE DATA 
CRCIS ONE BYTE DATA. 
RESERVED. 
RESERVED. 
RESERVED. 
RESERVED. 
RESERVED. 
RESERVED 
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5% 0Ci324 

SS7 001326 

S98 001330 

39S 001332 

bOO 00133M 

601 001336 

b02 Q013H0 

&03 0013H2 

bOH QC134M 

bOS 0013% 

bOb 001350 

b07 001352 

bOS 001354 

bO? 00135b 

blO 001360 

bll 001362 

bl2 001364 

bl3 001366 

614 001370 

bl5 001372 
616 



000102 
004076 
000102 
00407b 
000102 
004076 
000102 
004076 
000102 
004076 
000102 
004076 
000102 
004076 
000102 
0C4076 
000102 
004076 
000102 
004076 



166 
167 
170 
171 
172 
173 
174 
175 
176 
177 



MfiCYll 27 1 



000102 
SMLRCE 
000102 
SMLRCE 
000 I 02 
SMLRCE 
000102 
SMLRCE 
000102 
SMLRCE 
000102 
SMLRCE 
000102 
SMLRCE 
000102 
SMLRCE 
000102 
SMLRCE 
000102 
SMLRCE 



COS 
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RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 
RESERVED 



D02 
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617 
&18 

&1<3 00i37H 

620 001376 

621 001400 
611 001402 

623 001404 

624 001406 

625 001410 

626 001412 

627 001414 

628 001416 

629 001420 
63C 001422 

631 001424 

632 001426 

633 0014X 

634 001432 

635 001434 

636 001436 

637 001440 
639 001442 

639 001444 

640 001446 

641 001450 

642 001452 

643 001454 

644 0D1456 

645 001460 

646 001462 

647 001464 

648 001466 
64? 001470 
650 001472 



000001 
000002 
000004 
000010 
000020 
000040 
000100 
000200 
000400 
001000 
002000 
004000 
010000 
020000 
040000 
100000 
177776 
177775 
177773 
177767 
177757 
177737 
177677 
177577 
177377 
176777 
175777 
173777 
167777 
157777 
137777 
077777 



:DATA 

6oi 

D02 
D03 
004 
005 
006 
007 
010 

013 
D14 
015 
016 
D17 
020 
D21 
D22 
023 
024 
025 
D26 
027 
D30 
031 
032 
033 
034 
035 
036 
037 
040 
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UORO TABLE 
000001 
000002 
000004 

m 

OO0Q4Q 
QOOlOO 
00Q20Q 

wm 

002000 
004000 
010000 
020000 
040000 
100000 
177776 
177775 
177773 
177767 
177757 
177737 
177677 
177577 
177377 
176777 
175777 
173777 
167777 
157777 
137777 
077777 



IZt-ih-B Kill-fl CYCLIC REDUrCANCY CHECK TEST 
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fcSi 0C1474 



654 001502 

655 001504 
aSb Q0150& 
657 001510 
&5S 001512 
&59 001514 
£>&0 00151b 
561 001520 
boZ 001522 
6&3 001524 
564 001526 

665 001530 

666 001532 

667 001534 

668 001536 

669 001540 

670 0C1542 

671 00154« 

672 001546 

673 001550 

674 001552 

675 001554 

676 001556 

677 001560 

678 001562 
67'3 001564 
6S0 001566 
681 001570 



052525 
125252 
031463 
146314 
070707 
107070 
007417 
170360 
041045 
136732 
154321 
023456 
133333 
044444 
000000 
17777? 
000000 
111111 
022222 
133333 
044444 
155555 
066666 
177777 
101010 

mill 

121212 
131313 
141414 
151515 
161616 



041 

SmI 

044 
045 
046 
047 
050 
D51 
052 
D53 

BIS 

056 
D57 
060 
061 
062 
063 
064 
065 
066 
067 
070 
071 
072 
073 
074 
075 
076 
077 



EQ2 
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052525 
125252 
031463 
146314 
070707 
107070 
007417 
170360 
041045 
136732 
154321 
023456 
133333 
044444 
000000 
177777 
000000 

mill 

022222 
133333 
044444 
155555 
0&6&&6 
177777 
101010 

mill 

121212 
131313 
141414 
151515 
161616 
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bBZ 








bB3 
















t>e5 












000000 




687 




000001 




688 




000002 




68(3 




000003 




b«30 




000004 




691 




OlSooos 




bSS 




000006 




693 




000007 




69H 




000007 




695 


001572 


177570 




696 




177776 




697 




104400 




698 




lOMOnO 




699 




00Cc:40 




7D0 




177560 




701 




177562 




7C2 




177564 




703 




177566 




7DH 




001000 




705 




001270 




706 




001374 




707 




001570 




708 


00157M 


170700 


OEVADR: 


709 


001576 


000000 


DFLG: 


710 


001600 


000000 


DFLGfl: 


711 


001602 


000000 


EFLG: 


712 


00160H 


000000 


HBCC: 


713 


001606 


000000 


HDONE: 


71H 


001610 


000000 


IFLG: 


715 


001612 


000000 


IFLGfl: 


716 


001614 


000000 


ITflCNT: 


717 


0G1616 


000100 


ITflNO: 


718 


001620 


000000 


OPSTflT: 


719 


001622 


000000 


OTftCNT: 


720 


00162H 


000000 


OTPUKA: 


721 


001626 


000000 


OTPUKB: 


722 


001630 


000000 


SELFLG: 


723 


001632 


000000 


SCORTN: 


72m 


00163M 


000000 


SMBCC: 


725 


001636 


000000 


sneccA: 


726 


001640 


000000 


SMCNT: 


7i7 




000000 


SMOATA: 


728 


001644 


000000 


SnOONE: 


729 


001646 


000000 


SnUKA: 


730 


001650 


000000 


SNUKB: 


731 


001652 


000000 


STCNT: 


732 


001654 


000000 


TEUK: 


733 


001656 


000000 


FTITLE: 


73'* 


001660 


000000 


PflSCNT: 



F02 
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;; EQUATES, CONSTANTS AND VARIABLES 



177560 
177562 
177564 
177566 



R0=-^0 
Rls'/.l 
R2=X2 
R3=W3 
R4S-/.4 
R5=y.5 
SP=X6 
PC=-/.7 
R7=PC 

SUR: 177570 
PS=177776 
SCOPE=TRflP 
HLTrEMT 
N0P=240 
TKCSR= 
TKDBR= 
TPCSR= 
TPDBR= 
INTBEGsIOl 
INTEND=I57 
DATBEG=D01 
DATEND=D77 
170700 
0 
0 
0 
0 
0 
0 
0 
0 

100 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 



UORK 

INSTRUCTION POINTER. 
DATA POINTER. 
DEVICE ADDRESS POINTER 
UORK 

SUBROUTINES. 
STACK POINTER 
PC 

SWITCH REGISTER. 
PROCESSOR STATUS 



;TTY KEYBOARD STATUS 
TTY KEYBOARD BUFFER 
PRINTER STATUS 
PRINTER BUFFER 



(BCC). 



; TITLE PRINTED = 1 



DZKOA-B I'Gll-fl CYCLIC REDUNDANCY CHECK TEST 
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001664 
001670 



735 
736 
737 

738 001662 

Z33 

740 

741 001676 

742 001700 

743 001704 

744 001706 

745 001712 

746 001720 

747 001726 

748 001734 

749 001742 

750 DQ1750 

751 001756 

752 001764 

753 001772 
75W 002000 
755 

756 002002 

757 002010 

758 002014 

759 002016 

760 002022 

761 002024 

762 002030 

763 002034 

764 002042 

765 C02044 

766 002050 

767 D0205H 

769 C02056 
'69 QD2062 

770 002066 

771 002070 
772 

773 

774 00207^ 

775 0Q21C2 

776 002110 

777 002116 

778 002120 

779 002126 

780 002132 

781 002134 

782 002142 

783 002150 

784 002152 
7BE 002156 



000005 

001444 
005767 
001041 
004567 
077536 
020101 
046103 
042105 
041516 
041505 
052123 
030455 
043513 
057536 

012767 
005067 
000402 
005267 
000005 
005067 
012706 
023737 
001402 
004767 
016703 
005723 
004567 
005767 
001434 
000167 



017767 
052767 
032767 
001^*03 
042767 
005767 
001011 
016767 
032767 
001402 
0Q5067 
000205 



001000 
000042 

177752 

001746 
043513 
020055 
041511 
047125 
020131 
020113 
020054 
026461 
026501 



000001 
177614 

177606 

177552 
001000 
000042 

D02600 
177520 

000012 
177542 

000324 



177472 
000020 
010000 

000020 
177476 

177456 
004000 

177436 



000046 



030461 
054503 
051040 
040504 
044103 
0 .2524 
042115 
055104 
077502 



177646 



000046 



175650 



177452 
177450 



I DENT: 



INIT: 

INTfl: 
INTB: 



17751b OPCHG: 

175666 

177502 



OPCfl: 



OPCB: 



flfiCYH 



; ; INIfll 

RESET 

MOV 

CMP 

BEQ 

TST 

BNE 

JSR 

.ASCII 



.EVEN 

MOV 

CLR 

BR 

INC 

RESET 

CLR 

MOV 

CMP 

BEQ 

JSR 

MOV 

TST 

JSR 

TST 

BEQ 

JMP 



MOV 
BIS 
BIT 
BEQ 
BIC 
TST 
BNE 
MOV 
BIT 
BEQ 
CLR 
RT£ 



G02 

27(1006) 25-0CT-76 22:42 PAGE 19 



ilOOO.SP 
ai42,Sl»46 

INIT 

FTITLE 

INIT 

R5JYPE 

/t><177>/KGllA 



SET SP TO 1000. 

IN ACTll AUTOMATIC MODE' 

YES, SKIP TITLE 

HAS TITLE BEEN PRINTED BEFORE' 
YES. SKIP TITLE 
TYPE THE PROG. NAME. 

CYCLIC REDUNDANCY CHECK TEST, MC-li-D2KGA-B/<l77>/f«-/ 



il, FTITLE 
SELFLG 
INTB 
SELFLG 

EFLG 
•lOOO.SP 
3i42,Si46 
.+6 

PC . SUSWR 

DE^ADR,R3 

(R3) + 

R5, OPCHG 

SELFLG 

FULMOO 

SELMOD 



;SET FLAG 

CLEAR SELFLG (START MAS FROM LOC. 200.) 
' BRANCH 

•SET SELFLG (START WAS FROM LOC. 204.) 



ARE UE IN ACTll AUTOMATIC MODE' 

YES. NEVER MIND ABOUT SWR 

CHE6k for HARDWARE SWITCH REGISTER 

R3 DEVICE ADDRESS. 

ADJUST R3 TO POINT AT BCC. 

READ SWR i SET UP PROG. ACCORDINGLY. 

WAS START FROM LOC. 200' 

YES - BRANCH. 

NO. - JUMP. 



aSUR.OPSTAT 
i20.PS 

»10600,0PSTAT 

OPCA 

f20.PS 

SELFLG 
OPCB 

ITANO.ITACNT 

114000 OPSTAT 

OPCB 

ITACNT 

R5 



STORE SUR. 
SET "T" BIT IN PS. 
INHIBIT TRACE TRAP' 
NO. - BRANCH 

YES. - CLEAR "T" BIT IN PS. 
SELECT MODE (START WAS FROM 202)^ 
YES. - BRANCH. 

NO. - SET ITERATE CNT. TO ITERATE NO. 
INHIBIT ITERATIONS' 
NO. - BRANCH. 

YES. - CLEAR ITERATE COUNTER 
RETURN. 
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796 
787 
788 
789 
790 

791 0021£>0 

79! 88il^O 

794 00217b 

795 002202 

796 002206 
757 002214 

798 002220 

799 002224 

500 002226 

501 002232 

802 002234 

803 002240 

804 002242 

805 0022% 
906 002252 

807 002254 

808 002260 

809 002266 

810 002270 

811 00227M 

812 002276 

813 002304 

814 002306 

815 002312 

816 002314 

817 002320 

818 002322 

819 002330 

820 002334 

821 002336 

822 002342 

823 002344 

824 002350 

825 002352 

826 001356 

827 002360 

828 002364 

829 002366 

830 002370 

831 002372 
832 

833 002376 

834 002402 
935 002404 

336 002406 

337 002410 

338 002412 
839 002414 
340 002416 
341 



012701 

012702 

116167 

004767 

005067 

052767 

004571 

105761 

001413 

031127 

001005 

021167 

001402 

005067 

004567 

000402 

004567 

027767 

001403 

004567 

000731 

032767 

001011 

005767 

QC1406 

005367 

001337 

016767 

020227 

001403 

062702 

000712 

020127 

001403 

06P701 

000702 

004567 

025007 

005015 

057400 

005267 

013700 
001405 
000005 
004710 
000240 
000240 
000240 
000660 



001000 
001374 
000001 
002542 
177426 
000200 
000002 

ooocr. 

0040CO 

176764 

177376 
000476 

000606 
177306 

177600 

004000 

177346 

177274 

177270 
001570 

000002 

001270 

000004 

001274 



177262 
000042 



:FULL TEST MODE. CONTROL THE TESTING OF ALL KGll INSTRUCTIONS 
IN THE INSTRUCTION TABLE USING ALL DATA WORDS IN THE DATA 
;W0RD TABLE WITH EACH INSTRUCTION. 



FULMOO: 
FULA: 
177442 FULB: 



177430 



FULC: 



FULD: 

FULE: 
177332 FULF: 



177314 FULG: 



177264 



flov 

MOV 

M0V8 

JSR 

CLR 

BIS 

JSR 

TSTB 

BEQ 

BIT 

BNE 

CMP 

BEQ 

CLR 

JSR 

BR 

JSR 

CMP 

BEQ 

JSR 

BR 

BIT 

m 

BNE 

MOV 

CMP 

BEQ 

ADD 

BR 

CMP 

BEQ 

ADD 

BR 

JSR 

025007 
005015 
057400 
INC 



MOV 
BEQ 
RESET 

JENDAO: JSR 
NOP 
NOP 
NOP 

RETURN: BR 



FULH: 
FULI: 
FULJ: 



«INTBEG,R1 
•DATBEG1R2 
+1(R1),SmCNT 
PC.CKSMR 

sm6cc 

•200,SMD0NE 
R5.a42(Rl) 
+1(R1) 
FULE 

(Rl),«4000 

FULD 

(R1),I46 

FULD 

SMDONE 

R5, TESTA 

FULF 

R5, TESTE 

aSWR.OPSTAT 

FULG 

RS.OPCHG 

FULMOD 

t4000,0PSTAT 

FULH 

PASCNT 



^CNT 
FULC 

ITANO.ITACNT 
R2, iOftTEND 
FUdl 
•2,R2 

fuCb 

Rl , tlNTEND 

FULJ 

•4,R1 

FULA 

RS.TYPE 



PASCNT 

at42.R0 
RETUftN 



7,(RQ) 
FULMOD 



INST. POINTER (Rl) SET TO BEGIN OF INST. TABLE 

DATA POINTER (R2) SET TO BEGIN 0^ DATA TA9LE. 

STEP COUNT (IF ANY) SET FOR SIMLLATE. 

CHECK FOR CNTL G TO LOAD SWR 

SIMULATED BCC SET TO 0. 

SET THE SIMULATED DONE BIT. 

SIMULATE INST. (VIA Rl) ON DATA (VIA R2). 

IS THE INST. A STEP TYPE' 

NO - BRANCH. 

YES. - IS THE INST. 110,120,130. OR 140' 

YES. - BRANCH. 

NO. - IS THE INST. 146' 

YES ~ BRANCH 

NO.*- CLEAR THE SIMULATED DONE BIT. 
DO TEST A (STEP INST. TEST). 
BRANCH 

NO. - DO TEST 8 (NON-STEP INST. TEST). 
HAS OPERATION STATUS STATUS (SUR) CHANGED" 
NO - BRANCH 

YES. - GO SET UP NEW OPERATION STATUS. 
BRANCH. 

NO. - ITERATE' 
NO. - BRANCH 
FIRST PASS' 

YES, SKIP ITERATIONS THIS TIME 

YES. - DECREMENT ITERATE COUNTER. IS IT=0' 

NO. - BRANCH. (KEEP ITERATING). 

YES. - SET ITERATE CTR. TO ITERATE NUMBER. 

HAVE ALL DATA WORDS BEEN TESTED' 

YES - BRANCH. 

NO. - ADVANCE DATA POINTER (R2). 
BRANCH 

HAVE ALL INSTS. BEEN TESTED' 
YES - 6RIWCH 

NO.'- advance' INST. POINTER (Rl). 
BRANCH 

YES. PASS COMPLETE. RING TTY BELL AND PRINT 



; INCREMENT PASS COUNT SO SUBSEQUENT 
.'passes will ITERATE 



; START TEST OVER 
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S-2 

945 

94fc 002420 

347 002424 

948 302432 

549 002440 

35C 002446 

SEl 002450 

852 002452 

S53 OOSMSb 

854 0024t»2 

QC5 QOgMTg 

8§6 0Q247M 

857 002500 

IP 88II?S 

Bfcu 002522 

e&l 002524 

862 00252& 

863 002532 

864 002536 

865 002542 

866 002546 

867 002552 
368 002560 
869 002564 
370 002570 
871 002576 
S72 002602 
B73 002610 

874 002614 

875 002620 
376 002622 

877 002626 

878 002630 

879 002634 

880 002636 

881 00264E 

882 002646 

883 002650 

884 002654 
865 002662 

886 002664 

887 002670 

888 002672 

889 002676 

890 002700 
S91 002704 
992 002706 
893 002712 
39" 002714 
995 002720 
S9b 0027S4 
597 002726 



012701 

016767 

042767 

016767 

001412 

000241 

006167 

006167 

162767 

066701 

012702 

016767 

042767 

016767 

001420 

000241 

006067 

006067 

006067 

006067 

006067 

162767 

066702 

004767 

116167 

005067 

052767 

004571 

105761 

001413 

031127 

001005 

021167 

001402 

005067 

004567 

000402 
004567 
026777 
001403 
004567 
000653 
005767 
001010 
020227 
001403 
062702 
000724 
012702 
005767 
001317 
020127 



301000 
177170 
177700 
177144 



177132 
177126 
000004 
177114 
001374 
177114 
17Q077 
17'056 



177044 
177040 
177034 
177030 
177024 
000002 
177012 
002154 
000001 
177032 
000200 
000002 
000001 

004000 

176370 

177002 
000102 

000212 
176740 

177204 

176702 

001570 

OOQOOc 

001374 
176666 

001270 



: SELECT TEST MODE. CONTROL THE TESTING OF THE INSTPUCTICN SELECTED 
•ON SWR5-0 (00=ftLL INSTS. ) USING THE DflTfi WORD SELECTED ON SURll-b. 



177156 
177150 
177144 



177120 



SELMOD: MOV 
MOV 
BIC 
MOV 



177070 
177Q62 
177056 



SELA: 



177016 

177042 
177034 



SEL8: 



176710 



SELC: 

SELD: 
SELE: 



SELF: 



5ELQ: 
SELH: 



ROL 

ROL 

SUB 

PDD 

MOV 

MOV 

BIC 

MOV 

BEQ 

CLC 

ROR 

ROR 

ROR 

ROR 

ROR 

SUB 

ADD 

JSR 

MOVB 

CLR 

BIS 

JSR 

TSTB 

BEQ 

BNE 

CMP 

BEQ 

CLR 

JSR 

BR 

JSR 

CMP 

BEQ 

JSR 

BR 

TST 

BNE 

CMP 

BEQ 

ADD 

BR 

MOV 

TST 

BNE 

CMP 



tINTBEG.Rl 

opstSt.Iflg 

•177700, IFLG 
IFLG, IFLGA 
SELA 

IFLG 
IFLG 
«4, IFLG 
IFllG.Rl 

idat6eg.R2 

opstat.Dflg 

il7007^DFLG 

DFLG,DFi.GA 

SELB 

DFLG 

DFLG 

DFLG 

DFLG 

DFLG 

12, DFLG 

0FtG.R2 

PC.CRSWR 

+1(R1),SMCNT 

SMBCC 

t200,SMD0NE 
R5,3+2(R1) 
+1{R1) 
SELD 

(Rl), 14000 

SELC 

(RD.IMb 

SELC 

SHDONE 

R5, TESTA 

il^fESTB 

OPSTflT,aSWR 

SELF 

RS.OPCHG 
SELMOD 
DFLGA 
SELH 

R2, IDATEND 

SELG 

t2,R2 

SELB 

tDATBEG,R2 

IFLGA 

SELB 

R1.«INTEND 



;INST. POINTER (Rl) SET TO THE INST. 
•SELECTED ON SR BITS S-0. 



;DATA POINTER (R2) SET TO THE DATA 
;UORD SELECTED ON SR SITS 11-6 



CHECK FOR CNTL G TO LOAD SMREG 

STEP COUNT (IF ANY) SET FOR SIMULATE. 

SIMULATED BCC SET TO 0. 

SET THE SIMULATED DONE BIT. 

SIMULATE INST. (VIA Rl) ON DATA (VIA R2). 

IS THE INST. A STEP TYPE' 

NO. - BRANCH. 

YES. - IS THE INST. 110,120,130, OR IHO' 

YES. - BRANCH. 

NO. - IS THE INST. 146' 

YES ** BRANCH 

NO.'- CLEAR THE SIMULATED DONE BIT. 
DO TEST A (STEP INST TEST). 
BRANCH. 

NO - DO TEST B (NON-STEP INST. TESTJ. 

HAS OPERATION STATUS (SUR SETTINGS) CHANGED' 

NO - BRANCH 

YES. - GO SET UP NEU OPERATION STATUS. 
BRANCH 

IS DATA FLAGA N0N-2ER0' 

YES. - DATA POINTER (R2) IS FROZEN. - BRANCH 
NO. - HAVE ALL DATA UORDS BEEN TESTED' 
YES - BRANCH 

NO.*- AOVANCE'DATA pointer (R2). 
BRANCH 

DATq POINTER (R2) SET TO BEGIN OF DATA TABLE 
IS iNST. FLAGA NON-ZERO' 
YES. - INST. POINTER (Rl) IS FROZEN (BRANCH) 
NO. - HAVE ALL INSTS. BEEN TESTED' 



OZKGA-B KGil-fl CYCLIC REDUf€ANCY CHECK TEST 
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893 QC2732 001403 

89<3 002734 Qfil^pi 000004 

IS ^Bii 012761 001000 5ELI: 

902 002746 000706 

903 



JOE 
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eEo 

flOV 
SR 



SELI 
•4,R1 

iINTBEG,Rl 
SELB 



'^ES. " BRANCH 

NO.'- advance' INST. POINTER (Rl). 
BRANCH 

INST. POINTER (Rl) SET TO BEGIN OF INST. TABLE. 
BRANCH. 



DZkGfi-B KGll-fl CYCLIC REDUNDANCY CHECK TES"' 
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flflCYU SZilQOb) 



K02 

25-OC'- 
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•304 
SOS 
906 
907 

9oe 

909 
91D 
911 

912 002750 

913 002752 
9iH 002760 

915 00?7t>g 

916 00^772 

917 002776 

918 00300M 

919 003006 

920 003014 

921 003020 

922 003024 

923 003026 
9E4 003034 

925 003042 

926 003044 

927 003052 

928 003054 

929 003056 

930 003062 

931 0C3Q64 



104400 
116167 
012763 
111163 
011263 
052763 
000240 
016367 
011367 
005367 
001364 
042767 
026767 
001004 
026767 
001401 
104000 
005767 
001374 
000205 



000001 
000020 
177776 
000002 
000040 

177776 
176564 
176626 

177577 
176546 



176672 
177776 



177776 
176572 



176552 
176602 



176S34 176562 



176520 



;TEST fl. 

;TEST THE INSTRUCTION POINTED fiT BY Rl USING THE DflTfi WORD 
jPOINTED AT BY R2. (HIGH BYTE OF THE INST. UORD IS THE STEP COUNT 
:& LOW BYTE IS THE ACTUAL INST.) THE FINAL RESUuT IS STORED 
;INTO LOC. "HBCC" TO BE COMPARED UITH THE SIMULATED RESULT 
; WHICH rifiS BEEN STORED IN LOC. "SMBCC". 



TESTA: SCOPE 
MOVB 
MOV 
MOVB 
MOV 

TAA: BIS 
NOP 
MOV 
MOV 
DEC 
BNE 
BIC 
CMP 
BNE 
CMP 
BEQ 

TAB: HLT 
TAG: TST 
BNE 
RTS 



+1(R1),STCNT 
•20,-2(R3) 
(Rl5,-2(R3) 
(R2) +2(R3) 
•40,-2(n3) 

-2(R3).HD0NE 

(R3).H6CC 

STCNt 

TAA 

#177577. HDONE 

HD0NE,SHD0NE 

TAB 

HBCC, SMBCC 
TAC 

EFLG 

TAB 

R5 



GO RECORD ENTRY TO THIS TEST. 

SET UP STEP COUNT. 

CLEAR THE BCC & THE DONE BIT. 

MOVE INST. TO CSR. 

MOVE DATA TO DBR. 

ONE. 



STEP (SHIFT) 
PAUSE 

READ & STORE CSR (DONE EIT) 
READ & STORE BCC. 
IS STEP COUNT = 0' 
NO ~ BRANCH 

YES. - CLEAR ALL BUT THE DONE BIT. 
HARDWARE DONE BIT = SIMULATED DONE BIT^ 
NO. - BRANCH. (ERROR) 
YES. - HARDWARE BCC = SIMULATED 9CC' 
YES. - BRANCH. 

NO. - TRAP TO ERROR HANDLER. 
IS AN ERROR SCOPE LOOP RUNNING' 
YES. - BRANCH. 
NO. - RETURN. 
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25-0CT-76 22:40 














033 


















































94Q 




UAC ' WW 




177776 


9M1 


WW WW ' w 


011163 

W A A Jlww 


177776 

A r f r r B 




9M2 


QD31Q2 


ni 1263 

U A 1 www 






943 


DQ31£X 

WWW A WW 


000340 

WWUW >w 






9-44 


0031 10 


016367 

w A WWW' 


177776 

A • ■ ■ ■ W 


176470 








176462 

A r w I wfc 




94b 


003122 


032767 


000200 


176456 


947 


003130 


001404 






946 


003132 


026767 


176446 




949 


003140 


001401 






950 


003142 


104000 






951 


003144 


005767 


176432 




952 


003150 


001374 






95j 


003152 


000205 







LOS 

25-0CT-7B 
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;TEST 8. 

;TEST THE INSTRUCTION POINTED fiT BY Rl USING THE DfiTfi WORD 
;POINTED AT BY R2. THE RESULT IS STORED IN LOC. "HBCC" tq B£ 
; COMPARED WITH THE SIMULATED RESULT WHICH HAS BEEN STORED 
:IN LOC. "SMBCC". 



TESTS: SCOPE 
MOV 
MOV 
MOV 
NOP 
MOV 
MOV 
BIT 
BEQ 
CMP 
BEQ 

TBfl: HLT 
TB8: TST 
BNE 
RTS 



•2Q,-2(R3) 

(RlJ,-2(R3) 

(R2)>2(R3) 

-2(R3).HD0NE 
(R3),HgCC 
i2OO,HO0NE 
TBA 

HBCC, SMBCC 
TBB 

EFLG 

TBA 

R5 



GO RECORD ENTRY TO THIS TEST. 

CLEAR THE BCC. 

MOVE INST. TO CSR. 

MOVE DATA TO DBR (COMPUTE BCC) 

PAUSE. 

READ i STORE CSR (DONE BIT) 

READ & STORE BCC. 

IS DONE BIT = 1' 

NO. - BRANCH, i ERROR) 

HARDWARE BCC = SIMULATED BCC 

YES. - BRANCH, 

NO. - TRAP TO ERROR HANDLER. 
IS AN ERROR SCOPE LOOP RUNNING 
YES. - BRANCH. 
NO. - RETURN, 
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954 
955 
956 
957 

956 003154 

959 QOaibO 

9£>0 0031S4 

9&1 0031&b 

964 003202 

965 003204 

966 ^10 

967 003216 
966 003220 

969 003226 

970 003230 

971 003232 

972 003236 

973 003244 

974 003246 

975 003252 

976 003260 

977 003262 

978 003264 

979 003270 

980 003274 

981 003300 
9B2 003302 

983 003304 

984 003312 

985 003314 
9B6 003322 

987 003324 

988 003330 

989 003334 
990 

991 
992 

993 003336 

994 003340 

995 003344 

996 003346 
997 



004767 

^0^ 
005267 



001002 
004567 
023737 
001404 
032777 
001401 
000000 
004767 
027767 
001402 
004567 
032767 
001403 
022626 
000177 
005067 
005767 
001001 
000002 
032777 
001410 
032777 
001404 
062706 
000167 
000002 



000005 
004567 
000000 
000776 



001564 
176416 

176410 

020000 

000140 
000042 

100000 



001506 
176330 

176622 
040000 



176342 
176306 
176330 



000077 

007700 

000006 
177064 



000004 



;TRAP SERVICE ROUTINE (CALLED BY PSUEDO-OP HLTj 
: ERROR HANDLER. - TYPEOUTS - HALT - SCOPE LOOP. 



ERR: 



176416 ERA: 



000046 
176344 

176354 
176340 



176260 
176250 



ERB: 
ERC: 



ERD- 
ERE: 
ERF: 
ERG: 

ERH: 



JSR 

TST 

8NE 

INC 

BR 

BIT 

BNE 

JSR 

CMP 

BEQ 

BIT 

BEQ 

HALT 

JSR 

CUP 

BEQ 

JSR 

BIT 

BEQ 

cnp 

JttP 
CLR 
TST 
BNE 
RTI 
BIT 
BEQ 
BIT 
BEQ 
ADD 
JMP 
RTI 



FORCER: RESET 
JSR 

FEA: HALT 
BR 



PCCKSUR 

efiIg 

ERA 

eflg 



3000,CPSTAT 
ERC 

RB.TYPERR 
9tt42,3tt46 

.+12 

i 1 00000, 3SUR 
ERD 

PC, CKSWR 

asilR.OPSTAT 

ERE 

R5.0PCHG 

«46000,CPSTAT 

ERF 

(SP)+.(SP)+ 

aSCORtN 

EFLG 

SELFLG 

ERG 

i77,35UR 
ERH 

17700, 2SWR 
ERH 
16. SP 
SELMOO 



RSpTYPERR 
FEfi 



TO LOAD SWREG 
CHANGED' 



CHECK FOR CNTL G TO LOAD SWPEG 
FIRST ERR CALL FOR CURRENT TEST'' 
NO. - BRANCH. 
YES. - SET ERR FLAG. 
BRANCH. (UNCONDITIONAL TYPE OUT; 
INHIBIT TYPE OUT' 
YES. - BRANCH. 
NO. - TYPE ERR MESSAGE. 
ARE UE IN ACTll AUTOMATIC MODE' 
YES. HALT ON ERROR 
HALt ON ERR' 
NO ~ BRANCH 

YES. - HALT HERE AND WAIT FOR OPERATOR 

rCHECK FOR CNTL G T 
HAS GPEftATION STATUS (SWR) 
NO " BRANCH 
YES - GO set' UP NEU OPERATION STATUS. 
SCOPE LOOP' 
NO. - BRANCH. 
YES. - POP STACK 
RETURN (SCOPE LOOP). 
CLEAR ERR FLAG. 
SELECT MODE' 
YES ~ BRANCH 

NO.'- RETURN (CONTINUE TESTING). 

SUR5-0 = 0' 

YES. - BRANCH. 

NO. - SUR6-11 = 0' 

YES. - BRANCH. 

NO. - POP STACK. 

RESTART AT SELMOD. 

RETURN (CONTINUE TESTING). 



; FORCE AN ERROR-TYPE TYPEOUT 
WHENEVER STARTED FROM LOO. 210. 
THEN HALT. 
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9% 












lOOO 










;SUE 


lOOi 


003350 


105761 


000001 




TYPE 


IC3C2 


003354 


001404 




000214 




1003 


0033Sb 


012767 


020101 




1004 


003364 


000403 






TEA: 


.005 


003366 


012767 


020102 


000204 


1006 


003374 


010167 


176254 




TEB. 


1007 


003400 


162767 


000774 


176246 




1008 


003406 


006067 


176242 






1009 


003412 


006067 


176236 






1010 


003" lb 


042767 


177700 


176230 




1011 


003424 


004567 


000306 






1012 


003430 


001654 








1013 


003432 


003606 








101^4 


003434 


000002 








1015 


0Q343& 


010267 


176212 






101& 


CK}3442 


162767 


001372 


176204 




1017 


003450 


006067 


176200 






1018 


003454 


042767 


177700 


176172 




1019 


003462 


004567 


000250 






1020 
1021 


003466 


001654 








003470 


003613 








1022 


003472 


000002 








1023 


003474 


004567 


000236 






1024 


003500 


001634 








1025 


003502 


003624 








102b 


003504 


000006 








1027 


003506 


004567 


000224 






1028 


003512 


001604 








1029 


003514 


003635 








1030 


003516 


000006 








1031 


003520 


112767 


000061 


000123 




1032 


003526 


032767 


000200 


176110 




1033 


003534 


001003 








1034 


003536 


112767 


000060 


000105 




1035 


003544 


112767 


000061 


000101 


TEC: 


103& 


003552 


032767 


000200 


176026 




1037 


00356C 


001003 








1038 


003562 


112767 


000060 


000063 




1039 


003570 


004567 


000064 




TED: 


1040 


003574 


042524 






ENA: 


1041 


003576 


052123 






EHB: 


1042 


003600 


020077 






EMC: 


1043 


003602 


044440 








1044 


003604 


037477 






Ei.t: 


1045 


003606 


020040 






EMF: 


104b 


003610 


037504 






EriG: 



N02 
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ITINE - SET UP AND TYPE THE ERROR MESSAGE THAT STARTS AT EMfi. 



TSTB 

BEQ 

MOV 

BR 

MOV 

MOV 

SUB 

ROR 

ROR 

BIC 

JSR 

TEWK 

EMF 

2 

MOV 

SUB 

ROR 

BIC 

JSR 

TEUK 

EMH+1 

2 

JSR 
SMBCC 
EMM 
6 

JSR 
HBCC 
EMQ+1 
6 

MOVB 

BIT 

BNE 

MOVB 

MOVB 

BIT 

BNE 

MOVB 

JSR 

.ASCII 

.ASCII 

.ASCII 

.ASCII 

.ASCII 

.ASCII 

.ASCII 



♦ KRl) 
TEA 

•20101, EMC 
TEB 

120102. EMC 

Ri.TEui*: 

•lflTBEG-4,TEWK 

TEWK 

TEUK 

•177700, TEWK 
RS.OTA 



R2.TEWK 

iDATBEG-2,TEWK 

TEWK 

•177700. TEWK 
RS.OTA 



R5,0TA 



RS.OTA 



i61.£MX+l 
•206,SnD0NE 

TEC 

i60,EMX+l 

»6iIemy+i 

»206,HDONE 
TED 

«fcO.EriY+l 
RS.tYPE 

/it/ 
/ST/ 
/» / 

/ 1/ 
/??/ 

/ / 

/D'/ 



B03 



DZKifi-B KiU-A CYCLIC REDUNOfiNCY 
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:047 

1048 
1049 
1050 
lOSi 
1052 
1053 
1054 
1055 
105& 
1057 
1058 
1J5<3 
IC&O 
lOfel 
10&2 
iCb3 
^:&4 

• ntr 



X3&12 
303614 
^Ib 

003822 
003b24 
003b2b 
003630 
003632 
003634 
003636 
003640 
003642 
303644 
Q03b4b 
003b50 
303b52 
003654 
003656 



VI 
11440 
■~»77 
037477 
037477 
020040 
037510 
037477 
037477 
020077 
04204D 
047117 
C20105 
044502 
035124 
C37440 
037534 
057536 
000205 



EriH 

Efll 

Enj 

ENK 
EIH 
EMM 

Em 
Eno 
Erf» 

EMQ 
EK) 
EMS 
EMU 
EflV 
EMU 
EMX 
EMY 
EflZ 



.ASCII 
.ASCII 
.ASCII 
.ASCII 
.ASCII 
•ASCII 
.ASCII 
.ASCII 
.ASCII 
.ASCII 
.ASCII 
.ASCII 
.ASCII 
.ASCII 
.ASCII 
.ASCII 
.ASCII 
.ASCII 
RTS 



/» / 

/ 5/ 
/»?/ 

/'V 

/ / 
/HV 

/■??/ 
/' / 
/ 0/ 
/ON/ 
/E / 
/BI/ 
/T:/ 
/ '/ 
/\?/ 
/t«-/ 
R5 



1067 

:o&9 

1069 
1070 
1071 
1072 
1073 
107H 
1C75 
1076 
1077 
1078 
1079 
1080 
1081 
1082 
1083 
108M 
108E 
1086 
1087 



i-A CYCLIC REDUNDANCY 
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:"ECk TEST MflCYll 27(1026) 
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003660 
003664 
003666 
003672 
00367M 
003676 
003702 
00370M 
003706 
003712 
00371M 
003720 
003722 
00372M 
003730 
003732 
00373H 



105767 
100375 
121527 
001005 
105725 
004567 
005015 
000137 
121527 
001403 
112567 
000757 
105725 
032705 
001401 
005205 
000205 



173700 
000136 

177756 

000137 
173646 

000001 



: SUBROUTINE - TYPE ON THE TTY 
:THE CALL TO THIS SUBROUTINE. 



(♦■) CAUSES TERMINATION OF TYPEOUT. 
iFOLLOUING THE MESSAGE. 
tYPE: TSTB TPCSR 
TYPE 

(R5), 1(136 
TPA 
(R5) + 
R5,TYPE 



THE MESSAGE IMMEDIATELY FOLLOWING 
UP-ARROW (t) CAUSES A CRLF AND BACi<-AP«G.J 



RETURN WILL BE TO THE INSTRUCTION 



TPfi: 



TPB: 



TPC: 



TSTB 
BPL 
CMP8 
BNE 
TSTB 
JSR 

005015 
000137 
CMPB 
BEQ 
M0V8 
BR 
TSTB 
BIT 
BEQ 
INC 
RTS 



(R5),«137 
TPB 

(R5)+,TPDBR 

TYPE 

(R5) + 

IH.R5 

TPfc 

R5 

R5 



kill-A CYCLIC REDL'NOflNCY 
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1088 

108? 

10% 

1091 

1092 

1093 

109H 

1095 

10% 

1097 

1098 

1099 

1100 

llCl 

1102 

1103 

1104 

1105 

110E> 

1107 

HQS 

1109 

1110 

1111 

1112 

1113 



UUJ/ JO 


UiOSO' 


1 7CC.C.3 




i"iTQ« ncwj 
u 1 n. nuv 


www* >c» 








MOV 


003744 


012567 
016767 


175652 




MOV 


003750 


175650 


175650 


OTflLfl: flOV 


003756 


000241 






CLC 


003760 


006067 


175640 




ROR 


003764 


000241 






CLC 


003766 


006067 


175632 




ROR 


003772 


000241 






CLC 


003774 


006067 


175624 




ROR 


004000 


042767 


177770 


175620 


BIC 


004006 


052767 


000060 


175612 


BIS 


004014 


116744 


175606 




novo 


004020 


005367 


175576 




DEC 


004024 


001351 






BNE 


004026 


000205 






RTS 



SUBROUTINE - OCTAL TO flLPHfl CONVERSION fiCCORDING TO THE THREE WORDS 
inilEDIflTELY FOLLOWING THE CALL TO THIS SUBROUTINE. THE FIRST WORD POINTS 
AT THE WORD TO BE CONVERTED. THE SECOND WORD POINTS ftT THE STARTING 
LOC. WHERE THE RESULT IS TO BE MOVED. THE THIRD WORD IS THE NUMBER 
OF CHARACTERS TO BE CONVERTED AND MOVED. RETURN WILL BE TO THE 
INSTRUCTION FOLLOWING THESE THREE WORDS. 

3iR5)+.0TAWKA 
(R5)+,ft4 
(R5)+.0TACNT 

otawkA.otawkb 

OTAWKA 
OTAWKA 
OTAUKA 

•177770, OTAWKB 
i60,0TAWKB 
OTAWKB, -(R4) 
OTACNT 
OTALA 
R5 



CZK5A-B Kili-fl CYCLIC REDUNDANCY CHECK 
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rEST NflCYU 27(1006) 



ED3 

25-0CT-76 
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1115 
111& 
1117 
lllS 
1U9 
iicO 
..21 
1122 
1123 
1124 



004030 
004034 
004040 



011bb7 
004^67 
000002 



175576 
30C7Q4 



004042 000002 



;TRAP SERVICE ROUTINE - SCOPE = TRAP. 



SCORCD: nOV 
JSR 
RTI 



iSP),SCORTN 
PCCKSUR 



;TRflP SERVICE ROUTINE - 
TRTRTN: RTI 



;5fiVE THE STARTING LOC. OF TESTA OR ^ESTB, 
; CHECK FOR CNTL G TO LOAD SMRE6 
; RETURN. 

BIT SET rTRAP, 

;G00D BOY, NOU RETURN. 



1 

! 

I 
I 
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1125 
1126 
1127 
1128 
il2<3 
1130 
1131 
1132 
1133 
1134 
1135 
1136 
1137 
1138 
1139 
ilHQ 
llMl 

:iM2 

11H3 
1H4 
1145 
1146 

ii-^r 



(304044 
004052 
004060 
004066 
004070 
004076 
004104 
004112 
004116 
004120 
004124 
004132 
004136 
004144 
004152 
004156 
004162 
004164 
004170 
004174 
004176 



012767 
062767 
C42767 
000411 
012767 
062767 
052767 
005767 
001002 
005267 
016767 
011267 
016767 
066767 
C06067 
006067 
000241 
006067 
005367 
001360 
000205 



000010 
000010 
100000 

000010 
000010 
100000 
175522 

175514 
175504 
175504 
175472 
175472 
175470 
175452 

175452 
175444 



175566 
175560 
000070 

175542 
175534 
000044 



175504 

175502 
175474 



rSUSROUTINE 
SflLRCft: MOV 
SMLRCB: ROD 
SMLRCC: BIG 
BR 

SMLRCO: MOV 
SMLRCE: ADO 
SMLRCF: BIS 
SMLRCG: TST 
BNE 
INC 

SMLRCH: MOV 
MOV 

SMLRCI; MOV 
ROD 
ROR 

SMLRCJ: ROR 
CLC 
ROR 
DEC 
BNE 
RTS 
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SIMULATE ALL MODES 

mo.sncNT 

•lO.SMCNT 

«106000,SMLPCJ 

SMLRCG 

«10,SMCNT 

ilO.SMCNT 

«1D6000, SMLRCJ 

SMCNT 

SMLRCH 

SMCNT 

SNBCC.SMBCCR 

(R2),SnDATA 

SMBCC.SnUKA 

smdatA,smuka 

SMUKA 
SMBCC 

SMDATR 
SMCNT 
SMLRCI 
R5 



OF LRC 

; ENTRY LRCIB DOUBLE BYTE DR^fi. 
; ENTRY LRC16 SINGLE BYTE DATA. 
•ENTRY STEP LRC16. 

; ENTRY LRC8 DOUBLE BYTE DATA. 
ENTRY LRC8 SINGLE BYTE DATA. 
ENTRY STEP LRC8. 



;INSTR. MODIFIED: LRCi6=P0R LRC8=P0RB. 



:ZhiA-a Kiii-fl CYCLIC 
:zkihie.p:i ss-oct-tb 



1148 






1149 

:isc 

1151 














1152 


004200 


012767 


ill? 




mil 








1155 


004220 


001002 


115£> 


004222 


005267 


1157 
1158 


004226 


016767 


004234 


011267 


1159 


004240 


016767 


ll&O 


0042% 


066767 


Ubl 
11&2 


004256 


000241 
006067 


11£>3 


004262 


C{X)241 


1164 


004264 


006067 


11&5 


0U4270 


006067 


llbS) 


004274 


103014 


1167 


004276 


012767 


1 1168 


CttJ4304 


046767 


1 1169 


004312 


042767 


1170 


004320 


066767 


1171 


004326 


005367 


1 1172 


004332 


001342 


:i73 


004334 


000205 


, 1174 






1175 






' 1176 






1177 


004336 


012767 


1176 


004344 


062767 


1179 


004352 


005767 


1180 


004356 


001002 


iiei 


004360 


CK352b7 


1182 


0C4364 


016767 


1183 


004372 


011267 


1184 


004376 


016767 


1185 


004404 


C&6767 


1186 


004412 


000241 
006067 
000241 


1187 


004414 


1188 


004420 


1189 


004422 


006067 


1190 


Ctt)4426 


006067 


1191 


004432 


103014 


1192 


004434 


012767 


1193 


004442 


046767 


1194 


004450 


042767 


11^ 


004456 


066767 


i.1% 


□04464 


0IE367 


1197 


004470 


001342 


1198 


004472 


000205 


1199 






1200 
' 1201 










J202 


004474 


012767 


t 1203 


004502 


005767 



REDUNDANCY CHECK TEST 
22:40 



; SUBROUTINE 



000010 


175432 


5I1C16A: 


NOV 


Wi 


175424 










BNE 


175412 






INC 


175402 


175402 


SNC16D: 


MOV 


175402 






MOV 


175370 


175400 


SnClbt: 


nOV 


175370 


175372 




ADD 
CLC 


175J5c 






ROR 

CLC 


175352 






ROR 


175352 






ROR 
BCC 


120001 


175342 




MOV 


175324 


175334 




BIC 


120001 


175314 
175306 




BIC 


175322 




ADD 


175306 




SnC16F: 


DEC 






BNE 
RTS 



; SUBROUTINE 



000010 


175274 


SMCITA: 


NOV 


000010 


175266 


SMCITB: 


ADD 


175262 




SMCITC: 


TST 








BNE 


175254 






INC 


175244 


175244 


SMCITD: 


MOV 


175244 






MOV 


175232 


175242 


SMCITE: 


MOV 


175232 


175234 




ADD 








CLC 


175214 






ROR 








CLC 


175214 






ROR 


175214 






ROR 








BCC 


102010 


175204 




MOV 


175166 


175176 




BIC 


102010 


175156 




BIC 


175164 


175150 




ADO 


175150 




SnCITF: 


DEC 








BNE 








RTS 






; SUBROUTINE 


000006 


175136 


SMC12A: 


MOV 


175132 




SMC12B: 


TST 
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- SIMULATE ALL MODES OF CRC16. 

•lO.SMCNT ;ENTRY CRC16 DOUBLE BYTE DATA. 

5MC16D 
SHCNT 

SMBCC.SMBCCA 
(R2)JmDATA 
SMBCC.SMUKA 
SMDATA.SMUKA 

5MBCC 

SMDATA 

SMUKA 

SMC16F 

1120001. SMUKA 

SMBCC.SMWKA 

•120001, SMBCC 

SMUKA, SMBCC 

SMCNT 

5nC16E 

R5 

- SIMULATE ALL MODES OF CCITT. 

•10,SMCNT ;ENTRY CCITT DOUBLE BYTE DATA. 

no! SMCNT ; ENTRY CCITT SINGLE BYTE DATA. 

SMCNT ; ENTRY STEP CCITT. 

SMCITD 

SMCNT 

SMBCC.SMBCCA 
(R2).§M0ATA 
SMBCC.SMWKA 
SMDATA, SMUKA 

SMBCC 

SMOATA 

SMUKA 

SMCITF 

1102010, SMUKA 

SMBCC, SnUKA 

•102010, SMBCC 

SMUKA, SMBCC 

SMCNT 

SMCITE 

R5 

■ SIMULATE ALL MODES OF CRC12. 

•b.SMCNT ; ENTRY CRC12 SINGLE BYTE DATA. 

SMtNT -ENTRY STEP CRC12. 



:ZKiH-B KCU-fl CYCLIC REDUfCANCY CHECK TEST 
:ZkiHB.Pll 25-0CT-76 22: MO 



H03 



120M 
1205 
1206 

l2t3S 
1210 
1211 
1212 
1213 
1214 
1215 
12IE) 
1217 
121S 
1219 
1220 
1221 
1222 
1223 
122H 
1225 
i22& 



0CH5O6 
004510 
004514 



004534 
004542 
0045% 
004552 
004556 
004562 
004566 
004574 
00%00 
004602 
00%10 
004616 
004624 
004632 
004634 
004640 
004644 
004646 



301002 
005267 
016767 
011267 
016767 
066767 
106367 
106367 
006067 
106067 
106067 
042767 
006067 
103014 
012767 
046767 
042767 
066767 
000241 
006067 
005367 
001330 
D00205 



175124 
175114 
175114 
175102 
175102 
175066 
175062 
175056 
175052 
175046 
160000 
175046 



175114 SMC12C: 



175112 
175104 



175040 



036001 175036 

175020 175030 

036001 175010 

175016 175002 

175002 
174774 



SMC12D: 



SriCl2E: 
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BNE SMC12C 

INC SMCNT 

MOV SMBCC.SMBCCfl 

MOV (R2).§MDflTfl 

MOV SMBCi.SMUKfl 

ADD SMDflTA.SMUKfl 

fiSLB SMBCC 

ASL9 SMBCC 

ROR SMBCC 

RORB SMBCC 

RORB SMBCC 

6IC 1160000, SMBCC 

ROR SMUKA 

BCC SMC12E 

MOV 136001. SMUKA 

BIC SMBCC, SmUKA 

BIC I3600LSMBCC 

ADD SMUKA, §nBCC 

CLC 

ROR SMDATA 

DEC SMCNT 

BNE SMC12D 

RTS R5 



i 



5USUR: 



&MS' 



000176 174620 CKSWR: 



177744 
177736 



020114 



CNTLU: 



075 nSUR: 
037477 



nov 

MOV 

MOV 

CMP 

BEQ 

BR 

CMP 

MOV 

MOV 

MOV 

CMP 

BNE 

JSR 

RTS 



:rK(3fi-B K311-fl CYCLIC REOUNDflNCY CHECK TEST 
DZKiAB.Pil 25-0CT-76 22:4C 

1527 
1228 
i22<9 
12X 

1231 004650 013746 000006 

1232 004654 013746 000004 

1233 004660 012737 004700 000004 

ill? ^ & 

1236 004676 000404 

1237 014700 022626 

1238 S34702 012767 000176 
i23g 004710 012637 000004 

1240 004714 012637 000006 

1241 004720 022767 0001*6 174644 

1242 004726 C01002 

1243 004730 004767 000070 

1244 004734 000207 67S: 
1245 
1246 
1247 
1249 
1245 

iiSD 004736 000000 

1251 004740 000000 

1252 004742 000000 

1253 
1254 

1255 004744 022767 

1256 004752 001143 

1257 004754 105767 172600 

1258 004760 100140 

1259 004762 016767 172574 

1260 0047713 042767 177600 

1261 0D4776 022767 000007 

1262 005004 001126 

1263 005006 004567 176646 

1264 0D5012 041536 052116 

1265 005020 057107 137 

1266 005024 

1267 005024 004567 176706 

1268 005030 000176 

1269 005032 005055 

1270 005034 000006 

1271 005036 004567 176616 
1272 

1273 005042 051536 051127 

1274 005047 077 037477 

1275 005054 077 

1276 005055 040 020040 

1277 005062 040 

1278 005062 040 042516 

1279 005070 057440 

1280 .EVEN 
1281 
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: SWITCH REGISTER SIZING ROUTINE 



316, -(SP) 
314! -(SP) 
i64i.3l4 

.-j,4s« 

66S 

(SPH.(SP2+ 

tSURE&.SUR 

(SP) + ,iui4 

(SP)-^.3I6 

ttSURE&.SUR 

671 

PCCNTLU 
PC 



;SflVE VECTORS 

;SET UP FOR TIMEOUT 

; REFERENCE HflRDUflRE SWITCH REGISTER 



TflCK 

SOFTWARE SWITCH REG 



; RESTORE VECTORS 
; IS SWREG USED 
; ALLOW SUREG TO BE LOADED 



; CHECK SWITCH REGISTER ROUTINE. 
:0F L0C.176. 
: LOCATIONS USED: 
tEHPST: .WORD 0 



CHECKS FOR tC TO ALLOW CHANGING 



COUNT: 
TIB: 



CMP 

mo 

BPL 

CMP 
BNE 
JSR 
.ASCII 

.EVEN 
JSR 
SWREG 
MSWREG 
6 

JSR 

.ASCII 
.ASCII 



.WORD 
.WORD 



0 
0 



020040 MSWREG: .ASCII 
036527 MNEW: .ASCII 



ISWREQ,SWR 

OUT 
TKCSR 

•7. TIB 

OUT 

R5.TYPE 
/t6NTL Gt*-^ 



RS,OTfl 



RSJYPE 

/tSWRr/ 



/ / 

/ NEWS 



{SOFTWARE SWITCH REGISTER PRESENT 
;N0. GET OUT 
YE§.WJ5IT FOR 
; READY. GET CHARACTER 

He. (aHriDHUc. 



lis 



<ARE 
IT " <tG> 



;TYPE CNTL G 



;MOVE CONTENTS 
OF SWREG TO BE 
TYPED FOLLOWING 
THE MESSAGE SWR= 
TYPE THE COMPLETE MESSAGE 



;SWR= 



XXXXXX 



NEW= 



:;kGh-B KGll-fl CYCLIC REDUNDANCY CHECK 'EST 
DZkGAB.Pll 2S-0CT-7b 22:40 



mi 

004767 
04|7|7 

00073& 




iooSo? 

000154 
177b00 
000025 



000015 
176514 
000007 

[KK}060 



17-^634 

177624 
177616 



00S252 
005260 
005262 



006367 
006367 
006367 
142767 
156767 
005367 
001754 
000715 
016777 
000736 
000207 



SREAD: 
IS: 



3S: 

177604 2$: 



177564 

8S: 

177554 41: 



000067 177544 

176454 5S: 
057536 

177520 6S: 

177514 

177510 

000060 177506 
177502 177474 
177472 



177460 174312 71: 
OUT: 



I 



I 



JQ3 
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CLP 
flOV 
JSR 
BIC 
CnPB 
BNE 
BR CNTLU 



TEMPST 



, COUNT 
PC.TTIN 

25 



cnPQ 

BNE 

JSR 

.ASCII 

CMP 

BNE 

BR 

cnpB 

BGT 

CnPB 

BGE 

JSR 

.ASCII 

BR 

ASL 

ASL 

ASL 

BICB 

BI5B 

DEC 

BEQ 

BR 

MOV 

BR 

RTS 



.JS.TIB 

RS.TYPE 
/t<-/ 

•7, COUNT 
7$ 

OUT 

go, TIB 

•67, TIB 
6S 

RS.TYPE 

/t't*-/ 

3S 

TEMPST 

TEMPST 

TEMPST 

•60, TIB 

TIB. TEMPST 

COUNT 

5S 

IS 

TEMPST, aSWR 

ss 

PC 



GO READ A CHARACTER 
|TRjP JFF^JARBAGE 

BRANCH IF NOT 
START OVER 
IS IT A <CR>' 
BRANCH IF NOT 
TYPE LF,CR 

WAS IT FIRST CHARACTER 
CHANGE SMR IF NOT FIRST ONE 
GET OUT 



; START OVER IF NOT LEGAL CHARACTER 

:GET NITTY-GRITTY 
;ONLY UANT 6 DIGITS 

; CHANGE SUITCH REGISTER CONTENTS 
; RETURN TO PROGRAM 



:3iH 

1215 
131E> 
1317 
1318 
1319 
1320 
1321 
1322 
1223 
1324 
1325 
I32fc 
1327 
132B 
:32'3 



Kiil-A 
1 25- 



REDUNDflNCY CHECK TEST 
22:40 



005264 005067 172270 

005270 005067 172266 

005274 005067 177442 

005300 005267 172254 

005304 105767 172250 

005310 100375 

005312 016767 172244 177422 

005320 105767 172240 

005324 100375 

D05326 116767 177410 172232 

0D5334 000207 

COOOOl 



TTIN: 



TTIN2: 



K03 
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;TTY INPUT SUBROUTINE»»«««««««« 



CLR 
CLR 
CLR 
INC 

TTINl: TST8 
BPL 
MOV 
TSTB 
BPL 
MOVB 
RTS 

.END 



TKCSR 

TKDBR 

TIB 

TKCSR 

TKCSR 

TTINl 

TKDBR, TIB 

TPCSR 

TTIN2 

TIB,TPDBR 

PC 



DZKGA-B I 
DZKSAB.Pll 



CKSMR 

:ntlu 

COJNT 

DflTBEGs 

DfiTE^€= 

DEVflOR 

DFLC 

DFLGfl 

DCl 

DOS 

DQ3 

D34 

Das 

OOE) 
D07 

DID 
Dll 
012 
D13 
D14 
015 
DIE) 
D17 

Deo 

021 
D22 
D23 
D24 
025 
02b 
D27 
030 
031 
032 
033 
034 
DJS 
D3E) 
D37 
040 
041 
042 
D43 
044 
045 
04& 
047 
DSO 
D51 
D52 
053 
054 
055 



X4744 
005024 
0G4740 
001374 
001570 
001574 
001576 
001600 
001374 
00137b 
001400 
001402 
001404 
001406 
001410 
001412 
001414 
00141b 
001420 
001422 
001424 
001426 
001430 
001432 
001434 
001436 
001440 
001442 
001444 
001446 
001450 
C01452 
001454 
001456 
001460 
001462 
001464 
001466 
001470 
00147c 
001474 
001476 
001500 
0Q1502 
001504 
001506 
001510 
001512 
001514 
001516 
001520 
001522 
001524 
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056 


001526 


057 


nn 1 c^n 

U0153Q 


060 


001532 


061 


001534 


D62 


001536 


063 


001540 


064 


0U1542 


065 


nn 1 dm 

001544 


066 


nn 1 cue 

001546 


067 


nn 1 

001550 


D7D 


□01 55c 


D71 


nn 1 ecu 
□□15b4 


072 


nn 1 ccc 
□□155b 


U73 


nn 1 ccn 


D74 


nn f cc.3 

□□15bc 


075 


on 1 ecu 
001564 


D7b 


nm ccc 
□U15bb 


077 


nn f c^n 
□U157U 


EFLG 


nn 1 tn^ 
OOIdOc 


trip 


□□3574 


EtlB 


00357b 


EnC 


□UJb^O 


fun 

EnO 


□uJbuc 


EnE 


nn^tnu 
003bD4 


EnF 


nn'^tnt 
□□3bUc 


EnG 


nn^c- f n 


EnH 


nn^t f ^ 

□□3b Ic 


Enl 


003b 14 


Enj 


nnot \ c 
□03b lb 


EnK 


003620 


EnL 


□U3bee 


Enn 


nn^t Qu 

003624 


Enri 


□□3bcb 


Eno 


0u3b30 


Enr 


□□3632 


EnU 


□□3b34 


Enn 


nn^t ^c. 
□□3b3b 


PMC 

EnS 


nmc un 


EnU 


nnotu^ 
□□3b4c 


EnV 


D03b44 


PMI 1 

tnw 


nnocuc 
□Uub4b 


CMV 


nnoccn 
UUobbU 


CHY 


UUJbbc 


cnZ 


nn^c^cu 
UUJbb4 


tHH 


UUJl/4 


CDS 

tno 


nn^anu 


car* 


UUjclU 






ERE 


003252 


ERF 


003270 


ERG 


003304 


ERH 


003334 


ERR 


003154 



: TEST tIflCYll 27il0Db) 
SYHBOL TABLE 



LQ3 

25-0CT-: 



TEA 

FORCER 

FORERR 

FTITLE 

FULfl 

FULB 

FULC 

FOLD 

FULE 

FULF 

FULG 

FULH 

FULI 

FULJ 

FULMOD 

HBCC 

HDONE 

HLT r 

I DENT 

IFLG 

IFLGfi 

INIT 

iNTfl 

INTB 

INTBEGr 

INTENDS 

ITfiCNT 

ITflNO 

101 

102 

103 

104 

105 

106 

107 

110 

111 

112 

113 

114 

115 

116 

117 

120 

121 

122 

123 

124 

125 

126 

127 

130 

131 



003344 
003336 
000210 
001656 
002164 
002170 
002220 
002246 
002254 
002260 
002276 
002330 
002344 
002360 
002160 
001604 
001606 
104000 
001662 
001610 
001612 
002010 
002016 
002022 
001000 
001270 
001614 
001616 
001000 
001004 
001010 
001014 
001020 
001024 
00103Q 
001034 
001040 
0010H4 
001050 
001054 
001060 
001064 
001070 
001074 
001100 
001104 

001 no 

001114 
001120 
001124 
001130 
001134 
001140 
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iJC 


nm 1 uu 




nn 1 ten 
UUibbU 


X<3<3 




PC - 
"3 — 


1 7777C. 
if f f eb 


i JT 




PrTI IDN 

RL 1 unn 


nnpu 1 c 
uUc^ib 


135 


nn 1 1 tn 


07 - 


vnnnnn7 


1 JO 


nn 1 1 tu 


3vUrL — 


1 nuunn 
iu^nuu 




nn 1 1 7n 
UUi l/u 


cmBrn 
SUUnLU 


nnumn 
UUtUJU 


Tun 


nn 1 1 7u 

UUii^" 


crnoTN 


nn 1 3 
uuibwc 




nm 3nn 

UUiCUU 




UUCt' T 




nn 1 3nu 

UUiCU^ 


en D 

wLLD 


nnpctu 

UUc3d" 


TUT 


nmsin 

UUiCiU 




nnPEtWis 

UUCDnC 


TUU 
i~S 


UUiCi~ 


CFi n 

3C.LU 


nn?(>cn 

UUCD3U 


UUiCCU 


3CLC 


nnpfccu 

UUCC3~ 


l~o 


nn 1 ??M 

uUiCC > 


QFI FC'T 

3b^Cv 1 


nnnpnu 




UUICJU 


QFl F 
3Ci.r 


nnp<,7P 

UUCD/ C 




nn « p^M 

UUaCJ I 


CFI Fl (i 


nn I fc'^n 




nn 1 pun 

UUiC~U 


QFl 

3C.L.VJ 


nn?7 1 u 

UUCr i~ 


lac 


nm puu 
uuxcni 


QFl U 


nnP7?n 

UUCr CU 




UU1C3U 


CFI T 

3U.i 


nnPTM? 

UUC( ~c 


TCli 


nn 'i pcu 


3CJLn(JU 


nnpuPO 

UUC~CU 


TCC 
iS3 


nn 1 Pfcn 

UUiCDU 


QMRPf 


nniPv^M 


TCt. 

ibb 


nn I pcu 

UUiCD^ 


3nOUUH 


nnifcTfi 

UUIDOO 


13' 


nn I P7n 

UUXCr U 


3nw 1 I li 


nn»4T?Pi 


TCP 

leu 


nn 1 P7H 


CMriTR 
3nwi 1 o 


nn>47i4i4 


loi 


uu 1 JUU 


curt TP 


noMT^P 

uu lOSC 




nn 1 *5ni4 


3nvi 1 u 


uu vwO I 


A bo 


nnnin 


e«irTTC 
3nwi 1 c 


nnM'?7fi 

uu i«3r w 




nm Tin 

UUi Ji~ 


3nv 1 1 r 






on t *5Pn 

L<ui>3CU 




nn 1 c%i4n 


IDD 


nn I ^PM 


ICn 


nn4474 


Lor 


nm "^^n 

UUitSJU 


QMP 1 PR 
3nk> ico 


nnM^n? 

UUi3UC 


IfU 


nn I T^u 


CMPIPP 




If I 


nn t ^un 
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